inherited frmCashBankStatement: TfrmCashBankStatement
  Top = 139
  Caption = #38134#34892#23545#24080#21333
  PixelsPerInch = 96
  TextHeight = 12
  inherited Panel1: TPanel
    inherited labFuncName: TcxLabel
      Left = 15
      Top = 10
      Caption = #38134#34892
      Style.IsFontAssigned = True
      ExplicitLeft = 15
      ExplicitTop = 10
      ExplicitWidth = 28
    end
    inherited labFuncDesc: TcxLabel
      Left = 212
      Top = 10
      Style.IsFontAssigned = True
      ExplicitLeft = 212
      ExplicitTop = 10
    end
    inherited btnFilter: TcxButton
      TabOrder = 5
    end
    inherited dfCash: TFrameSetDateFilter
      inherited cxLabel2: TcxLabel
        Style.IsFontAssigned = True
      end
      inherited cxLabel3: TcxLabel
        Style.IsFontAssigned = True
      end
      inherited cxLabel4: TcxLabel
        Style.IsFontAssigned = True
      end
    end
    object edtBank: TcxDBLookupComboBox
      Tag = 26
      Left = 46
      Top = 8
      DataBinding.DataField = 'bankid'
      DataBinding.DataSource = dsBank
      Properties.ListColumns = <>
      TabOrder = 3
      Width = 145
    end
  end
  inherited pnlMain: TPanel
    inherited MainDataGrid: TcxGrid
      Height = 293
      ExplicitHeight = 293
      inherited MainDataGridDBTableView: TcxGridDBTableView
        DataController.Summary.FooterSummaryItems = <
          item
            Kind = skCount
            Column = colbdate
          end
          item
            Kind = skSum
            Column = colcreditamt
          end
          item
            Kind = skSum
            Column = coldebitamt
          end>
        OptionsView.ColumnAutoWidth = True
        object colbdate: TcxGridDBColumn
          Caption = #26085#26399
          DataBinding.FieldName = 'bdate'
          HeaderAlignmentHorz = taCenter
          Width = 80
        end
        object colremark: TcxGridDBColumn
          Caption = #25688#35201
          DataBinding.FieldName = 'remark'
          HeaderAlignmentHorz = taCenter
          Width = 100
        end
        object colbalanceid: TcxGridDBColumn
          Caption = #32467#31639#26041#24335
          DataBinding.FieldName = 'balanceid'
          HeaderAlignmentHorz = taCenter
          Width = 100
        end
        object colbillno: TcxGridDBColumn
          Caption = #32467#31639#21495
          DataBinding.FieldName = 'billno'
          HeaderAlignmentHorz = taCenter
          Width = 80
        end
        object coldebitamt: TcxGridDBColumn
          Caption = #20511#26041
          DataBinding.FieldName = 'debitamt'
          HeaderAlignmentHorz = taCenter
          Width = 80
        end
        object colcreditamt: TcxGridDBColumn
          Caption = #36151#26041
          DataBinding.FieldName = 'creditamt'
          HeaderAlignmentHorz = taCenter
          Width = 80
        end
      end
    end
  end
  inherited ToolBar: TToolBar
    inherited btnPrior: TToolButton
      Top = 0
      ExplicitTop = 0
    end
    inherited btnNext: TToolButton
      Top = 0
      ExplicitTop = 0
    end
    inherited btnSp1: TToolButton
      Top = 0
      ExplicitTop = 0
    end
    inherited btnAppend: TToolButton
      Top = 0
      ExplicitTop = 0
    end
    inherited btnEdit: TToolButton
      Top = 0
      ExplicitTop = 0
    end
    inherited btnDelete: TToolButton
      Top = 0
      ExplicitTop = 0
    end
    inherited btnSp2: TToolButton
      Top = 0
      ExplicitTop = 0
    end
    inherited btnImport: TToolButton
      Top = 0
      OnClick = btnImportClick
      ExplicitTop = 0
    end
    inherited btnRefresh: TToolButton
      Top = 0
      ExplicitTop = 0
    end
    inherited btnSp3: TToolButton
      Top = 0
      ExplicitTop = 0
    end
    inherited btnCancel: TToolButton
      Top = 0
      ExplicitTop = 0
    end
    object btnLoadBill: TToolButton
      Left = 512
      Top = 0
      Caption = #23548#20837
      ImageIndex = 39
    end
  end
  inherited pnlBottom: TPanel
    inherited lblGroupSort: TcxLabel
      Left = 322
      Style.IsFontAssigned = True
      ExplicitLeft = 322
    end
  end
  inherited MainMenu1: TMainMenu
    Left = 26
    Top = 72
  end
  inherited ActionList1: TActionList
    inherited actExit: TAction
      ImageIndex = 37
    end
  end
  inherited MainDataSetU: TUniQuery
    SQLInsert.Strings = (
      'INSERT INTO tft_cashBank'
      
        '  (bankbookid, bankid, balanceid, bdate, billno, debitamt, credi' +
        'tamt, checked, cleared, initflag, remark, sourceflag, create_by,' +
        ' check_time, create_time, update_time, filid)'
      'VALUES'
      
        '  (:bankbookid, :bankid, :balanceid, :bdate, :billno, :debitamt,' +
        ' :creditamt, :checked, :cleared, :initflag, :remark, :sourceflag' +
        ', :create_by, :check_time, :create_time, :update_time, :filid)')
    SQLDelete.Strings = (
      'DELETE FROM tft_cashBank'
      'WHERE'
      '  bankbookid = :Old_bankbookid')
    SQLUpdate.Strings = (
      'UPDATE tft_cashBank'
      'SET'
      
        '  bankbookid = :bankbookid, bankid = :bankid, balanceid = :balan' +
        'ceid, bdate = :bdate, billno = :billno, debitamt = :debitamt, cr' +
        'editamt = :creditamt, checked = :checked, cleared = :cleared, in' +
        'itflag = :initflag, remark = :remark, sourceflag = :sourceflag, ' +
        'create_by = :create_by, check_time = :check_time, create_time = ' +
        ':create_time, update_time = :update_time, filid = :filid'
      'WHERE'
      '  bankbookid = :Old_bankbookid')
    SQLLock.Strings = (
      'SELECT * FROM tft_cashBank'
      'WITH (UPDLOCK, ROWLOCK, HOLDLOCK)'
      'WHERE'
      '  bankbookid = :Old_bankbookid')
    SQLRefresh.Strings = (
      
        'SELECT bankbookid, bankid, balanceid, bdate, billno, debitamt, c' +
        'reditamt, checked, cleared, initflag, remark, sourceflag, create' +
        '_by, check_time, create_time, update_time, filid FROM tft_cashBa' +
        'nk'
      'WHERE'
      '  bankbookid = :Old_bankbookid')
    SQL.Strings = (
      'select m.*,b.name from tft_cashBank m '
      '  left outer join td_balance b on m.balanceid=b.balanceid'
      '  where m.BankId=:bankid')
    AfterScroll = MainDataSetUAfterScroll
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'bankid'
        Value = nil
      end>
  end
  object dsBank: TDataSource
    DataSet = cdsBank
    Left = 248
    Top = 73
  end
  object cdsBank: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 192
    Top = 57
    object cdsBankbankid: TIntegerField
      FieldName = 'bankid'
      OnChange = cdsBankbankidChange
    end
  end
end
